home *** CD-ROM | disk | FTP | other *** search
/ POINT Software Programming / PPROG1.ISO / pascal / swag / egavga.swg / 0080_More Characters.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1994-01-27  |  1.5 KB  |  40 lines
  1. {
  2. > I know that a double-byte char system exists on the PC for
  3. > producing characters beyond the 256 ASCII chars. How is this mode
  4. > initialized and manipulated? I am interested in creating far more than
  5. > 256 characters and writing them to the screen in text mode, and this
  6. > appears to be the only way.
  7.  
  8.  Don't think that can be done in normal Text Block Mode.
  9.  But if you flip your Video in Graphics you could always create Display
  10.  Driver to imulate many charactors.
  11.    There is a mode that lets you change one of the Charactor Attribute
  12.  Bits normal use to be used to select a different charactor set, but when
  13.  you do this you also lost that option of what that bit was prior.
  14.  here is the interrupt call
  15. }
  16.  
  17. Procedure Set512CharSet; Assembler;
  18. Asm
  19.   Mov     AH, 11H;
  20.   Mov     AL, 03H;
  21.   Mov     BL, $12; {Selects the Charactor Sets VIA Bit 3 in Char Attri
  22.   { BL must be loaded so the Video COntroler knows which Block to use }
  23.   { Depending on wether Bit 3 of the Charactor Attri is on of Off }
  24.   { The Upper 4 bits selects a block number to use for The On state of
  25.   { Bit 3, the ,Lower Four Bits Selects the OF State of Bit 3 }
  26.   Int     10H;
  27. End;
  28.  
  29. {
  30.  So after this, when ever you use TextColor(8 - 15) you will get the
  31.  Next Charactor set, ou lose the Intensity option..
  32.  this means only 7 8 colors. like the Background..
  33.  But you can chage the pallets.
  34. INt 10h
  35. Function 10h
  36. Subfunction 00h
  37. BX = 0712H
  38. INT 10H;
  39. { Function always loaded in AH reg, Subs in AL. }
  40.